#! /usr/bin/env perl
# author: maxiao
# date: 2023-03-07 9:58
# description: 实现字符串的重复输出


print "请输入一个字符串\n";
chomp($str = <STDIN>);
print "请输入字符串重复次数\n";
chomp($num = <STDIN>);
print "其最终的输出结果如下所示：\n";
print $str x $num;
print "\n";

